home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 August / PCWorld_2001-08_cd.bin / Software / TemaCD / xsetup / setup.exe / {app} / plugins / XQ AMD AGP LargePageMinimum 1.xpl < prev    next >
Text File  |  2001-04-14  |  2KB  |  55 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="Hardware\CPU"
  5. "NAME"="AMD Athlon/Duron Video Card Compatibility"
  6. "LANGUAGE"="VBScript"
  7. "TEXT 1"="Improve AGP video card compatibility with AMD CPUs"
  8. "DESCRIPTION 1"="If you have an AMD Athlon or Duron processor and are experiencing problems with your AGP video card, then applying this option may fix it."
  9. "DESCRIPTION 2"="If you experience any problems, clearing the tick in the box will return the setting to its default."
  10. "COMMENT 1"="Thanks to CptSiskoX [CptSiskoX@FlashMail.com] for the settings and idea!"
  11. "VERSION"="1.1"
  12. "AUTHOR"="Neil R. Turner (totalxs@hotmail.com) for Xteq Systems"
  13. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  14. "CONTACTURL"="http://www.neilrt.cwc.net/"
  15. "OSVERSION"="010101"
  16.  
  17. 'Declaration of some constants
  18. sP="HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management\"
  19.  
  20. 'Called when the Plugin is started
  21. SUB Plugin_Initialize
  22.  s=RegReadValue(sP&"LargePageMinimum")
  23.  if s=4294967295 then
  24.   Call SetUIElement(1,true)
  25.  end if
  26. END SUB
  27.  
  28. 'Called when the Plugin should validate the Data the user has entered
  29. SUB Plugin_CheckData(ElementIndex)
  30. END SUB
  31.  
  32. 'Called when the Plugin should apply the changes
  33. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  34.  s=GetUIElement(1)
  35.  if s=true then
  36.   i=RegReadValue(sP&"LargePageMinimum")
  37.   if i<>4294967295 then
  38.    Call RegWriteValue(sP&"LargePageMinimum_XSETOLD",i,3)
  39.    Call RegWriteValue(sP&"LargePageMinimum",4294967295,3) 
  40.   end if
  41.  else
  42.   i=RegReadValue(sP&"LargePageMinimum_XSETOLD")
  43.   if IsEmpty(i)=false then
  44.    Call RegWriteValue(sP&"LargePageMinimum",i,3)
  45.    Call RegDeleteValue(sP&"LargePageMinimum_XSETOLD")
  46.   else
  47.    Call RegDeleteValue(sP&"LargePageMinimum")
  48.   end if
  49.  end if
  50. END SUB
  51.  
  52. 'Called when the Plugin is about to be removed from memory
  53. SUB Plugin_Terminate
  54. END SUB
  55.